; * lisp/term/haiku-win.el (x-begin-drag): Fix compiler warning.

diff --git a/lisp/term/haiku-win.el b/lisp/term/haiku-win.el
index 9fa50d62e85033933a5f35ec858a62e11243cd20..83f70edd2c3e0c81545e86f9c14edaf8d1e64ec9 100644 (file)
--- a/lisp/term/haiku-win.el
+++ b/lisp/term/haiku-win.el
@@ -183,7 +183,7 @@ This is necessary because on Haiku `use-system-tooltip' doesn't
 take effect on menu items until the menu bar is updated again."
   (force-mode-line-update t))
 
-(defun x-begin-drag (targets &optional action frame return-frame)
+(defun x-begin-drag (targets &optional action frame _return-frame)
   "SKIP: real doc in xfns.c."
   (unless haiku-dnd-selection-value
     (error "No local value for XdndSelection"))